projects
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
5f3379b
)
* lisp/emacs-lisp/bytecomp.el: Fix errors with matching quoted forms
author
Vibhav Pant
<vibhavp@gmail.com>
Thu, 19 Jan 2017 17:43:53 +0000
(23:13 +0530)
committer
Vibhav Pant
<vibhavp@gmail.com>
Thu, 19 Jan 2017 17:43:53 +0000
(23:13 +0530)
* lisp/emacs-lisp/bytecomp.el: (byte-compile-cond-jump-table-info)
eval obj2 to avoid quoted forms being stored as is.
lisp/emacs-lisp/bytecomp.el
patch
|
blob
|
history
diff --git
a/lisp/emacs-lisp/bytecomp.el
b/lisp/emacs-lisp/bytecomp.el
index 74d135d155ca454e14fdcd4d587687e2da9dbc06..cb235697ed0aaded00e2a9b75c1bdcfafcf41e51 100644
(file)
--- a/
lisp/emacs-lisp/bytecomp.el
+++ b/
lisp/emacs-lisp/bytecomp.el
@@
-4005,7
+4005,7
@@
that suppresses all warnings during execution of BODY."
(eq obj1 prev-var)
;; discard duplicate clauses
(not (assq obj2 cases)))
- (push (list
obj2
body) cases)
+ (push (list
(eval obj2)
body) cases)
(if (eq condition t)
(progn (push (list 'default body) cases)
(throw 'break t))